home *** CD-ROM | disk | FTP | other *** search
/ La Bible Des... Jeux / La Bible des... Jeux.iso / Les Sharewares / Educatifs / A Panda is for Life... / Musical Panda / Musical Panda.6 / 00124.ls < prev    next >
Encoding:
Text File  |  1995-12-03  |  335 b   |  14 lines
  1. on exitFrame
  2.   global MUSIC_CHANNEL, currentVolume
  3.   set the volume of sprite MUSIC_CHANNEL to currentVolume
  4.   if currentVolume = 0 then
  5.     set the movieRate of sprite MUSIC_CHANNEL to 0
  6.   end if
  7.   animateSnowFlakes()
  8.   checkRollOvers()
  9.   if random(20) = 1 then
  10.     swapFlake(getAt(flakeList, random(6)))
  11.   end if
  12.   go(the frame)
  13. end
  14.